home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / docs / mags / MS_6_97.lha / utilities / extract < prev    next >
Encoding:
Text File  |  1997-07-10  |  1.2 KB  |  34 lines
  1. echo "Installationscript for utilities => Mealström July97"
  2. echo "Checking a few things first..."
  3. if exists "c:lha"
  4.    setenv > nil: exlha true
  5.    setenv > nil: cont true
  6. endif
  7. if not $exlha eq true
  8.    echo "Lha not found in c: drawer, please install this before continuing this "
  9.    echo "sript."
  10.    setenv > nil: cont false
  11. endif
  12. if not $cont eq false
  13.    echo "Proceeding with instalation..."
  14.    echo " The files will be extracted in the drawer:"
  15.    echo "   SYS:FILES/MEALSTRÖM/JULY97"
  16.    if not exists "sys:files"
  17.        makedir sys:files
  18.        echo "Making drawer sys:files..."
  19.        copy envarc:sys/def_drawer.info sys:files.info
  20.    endif
  21.    if not exists "sys:files/Mealström"
  22.        makedir sys:files/Mealström
  23.        echo "Making directory sys:files/Mealström..."
  24.        copy envarc:sys/def_drawer.info sys:files/Mealström.info
  25.    endif
  26.    if not exists "sys:files/Mealström/July97"
  27.        makedir sys:files/Mealström/July97
  28.        echo "Making directory sys:files/Mealström/July97..."
  29.        copy envarc:sys/def_drawer.info sys:files/Mealström/July97.info
  30.    endif
  31.    echo "Extracting *.l?? files..."
  32.    lha -q x *.l?? sys:files/Mealström/July97/
  33.    echo "All is extracted, have fun :-)"
  34. endif